home *** CD-ROM | disk | FTP | other *** search
/ PD ROM 1 / PD ROM Volume I - Macintosh Software from BMUG (1988).iso / Stacks / Hyper Education / Reading & Spelling / Flashcards⁄V1.2 / Flashcards_V1.2 / card_15371.txt < prev    next >
Encoding:
Text File  |  1988-04-23  |  5.7 KB  |  318 lines
  1. -- card: 15371 from stack: in.2
  2. -- bmap block id: 51078
  3. -- flags: 0000
  4. -- background id: 2586
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global gb
  9.   if gb = 1 then
  10.     hide button "1st"
  11.   else if gb = 2 then
  12.     hide button "2nd"
  13.   else if gb = 3 then
  14.     hide button "3rd"
  15.   else if gb = 4 then
  16.     hide button "4th"
  17.   else if gb = 5 then
  18.     hide button "5th"
  19.   else if gb = 6 then
  20.     hide button "6th"
  21.   else if gb = 7 then
  22.     hide button "7th"
  23.   else if gb < 1 then
  24.   end if
  25. end openCard
  26.  
  27.  
  28.  
  29. -- part 1 (button)
  30. -- low flags: 00
  31. -- high flags: 2000
  32. -- rect: left=87 top=63 right=122 bottom=161
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 20186 / 20186
  35. -- text alignment: 1
  36. -- font id: 0
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: 1st
  41. ----- HyperTalk script -----
  42. on mouseUp
  43.   global it
  44.   put 1 into it
  45.   global gb
  46.   if gb = 1 then
  47.     hide button "1st"
  48.   else if gb <> 1 then
  49.     visual venetian blinds
  50.     go to card id 48321
  51.   end if
  52. end mouseUp
  53.  
  54.  
  55.  
  56.  
  57. -- part 2 (button)
  58. -- low flags: 00
  59. -- high flags: 2000
  60. -- rect: left=195 top=64 right=123 bottom=269
  61. -- title width / last selected line: 0
  62. -- icon id / first selected line: 20186 / 20186
  63. -- text alignment: 1
  64. -- font id: 0
  65. -- text size: 12
  66. -- style flags: 0
  67. -- line height: 16
  68. -- part name: 2nd
  69. ----- HyperTalk script -----
  70. on mouseUp
  71.   global it
  72.   put 2 into it
  73.   global gb
  74.   if gb = 2 then
  75.     hide button "2nd"
  76.   else if gb <> 2 then
  77.     visual venetian blinds
  78.     go to card id 49339
  79.   end if
  80.  
  81. end mouseUp
  82.  
  83.  
  84.  
  85.  
  86. -- part 3 (button)
  87. -- low flags: 00
  88. -- high flags: 2000
  89. -- rect: left=316 top=62 right=120 bottom=388
  90. -- title width / last selected line: 0
  91. -- icon id / first selected line: 20186 / 20186
  92. -- text alignment: 1
  93. -- font id: 0
  94. -- text size: 12
  95. -- style flags: 0
  96. -- line height: 16
  97. -- part name: 3rd
  98. ----- HyperTalk script -----
  99. on mouseUp
  100.   global it
  101.   put 3 into it
  102.   global gb
  103.   if gb = 3 then
  104.     hide button "3rd"
  105.   else if gb <> 3 then
  106.     visual venetian blinds
  107.     go to card id 49533
  108.   end if
  109.  
  110. end mouseUp
  111.  
  112.  
  113.  
  114.  
  115. -- part 8 (button)
  116. -- low flags: 00
  117. -- high flags: 0000
  118. -- rect: left=191 top=253 right=313 bottom=268
  119. -- title width / last selected line: 0
  120. -- icon id / first selected line: 12195 / 12195
  121. -- text alignment: 1
  122. -- font id: 0
  123. -- text size: 12
  124. -- style flags: 0
  125. -- line height: 16
  126. -- part name: New Button
  127. ----- HyperTalk script -----
  128. on mouseUp
  129.   global it
  130.   put 1 into it
  131.   visual wipe right
  132.   go to card id 2403
  133. end mouseUp
  134.  
  135.  
  136.  
  137.  
  138. -- part 9 (button)
  139. -- low flags: 00
  140. -- high flags: 0000
  141. -- rect: left=292 top=251 right=322 bottom=372
  142. -- title width / last selected line: 0
  143. -- icon id / first selected line: 14953 / 14953
  144. -- text alignment: 1
  145. -- font id: 0
  146. -- text size: 12
  147. -- style flags: 0
  148. -- line height: 16
  149. -- part name: New Button
  150. ----- HyperTalk script -----
  151. on mouseUp
  152.   global gb
  153.   if gb = 7 then
  154.     show button "1st"
  155.     show button "2nd"
  156.     show button "3rd"
  157.     show button "4th"
  158.     show button "5th"
  159.     show button "6th"
  160.     show button "7th"
  161.     visual wipe left
  162.     go to card id 3029
  163.   else if gb <> 7 then
  164.     visual wipe left
  165.     go to card id 3029
  166.  
  167.   end if
  168. end mouseUp
  169.  
  170.  
  171.  
  172.  
  173. -- part 10 (button)
  174. -- low flags: 00
  175. -- high flags: 2000
  176. -- rect: left=87 top=157 right=215 bottom=159
  177. -- title width / last selected line: 0
  178. -- icon id / first selected line: 20186 / 20186
  179. -- text alignment: 1
  180. -- font id: 0
  181. -- text size: 12
  182. -- style flags: 0
  183. -- line height: 16
  184. -- part name: 4th
  185. ----- HyperTalk script -----
  186. on mouseUp
  187.   global it
  188.   put 4 into it
  189.   global gb
  190.   if gb = 4 then
  191.     hide button "4th"
  192.     visual venetian blinds
  193.     go to card id 49533
  194.   else if gb <> 4 then
  195.     visual dissolve fast
  196.     go to card id 49533
  197.   end if
  198.  
  199. end mouseUp
  200.  
  201.  
  202.  
  203.  
  204. -- part 11 (button)
  205. -- low flags: 00
  206. -- high flags: 2000
  207. -- rect: left=198 top=158 right=216 bottom=270
  208. -- title width / last selected line: 0
  209. -- icon id / first selected line: 20186 / 20186
  210. -- text alignment: 1
  211. -- font id: 0
  212. -- text size: 12
  213. -- style flags: 0
  214. -- line height: 16
  215. -- part name: 5th
  216. ----- HyperTalk script -----
  217. on mouseUp
  218.   global it
  219.   put 5 into it
  220.   global gb
  221.   if gb = 5 then
  222.     hide button "5th"
  223.   else if gb <> 5 then
  224.     visual venetian blinds
  225.     go to card id 49533
  226.   end if
  227.  
  228. end mouseUp
  229.  
  230.  
  231.  
  232.  
  233. -- part 12 (button)
  234. -- low flags: 00
  235. -- high flags: 2000
  236. -- rect: left=319 top=161 right=219 bottom=391
  237. -- title width / last selected line: 0
  238. -- icon id / first selected line: 20186 / 20186
  239. -- text alignment: 1
  240. -- font id: 0
  241. -- text size: 12
  242. -- style flags: 0
  243. -- line height: 16
  244. -- part name: 6th
  245. ----- HyperTalk script -----
  246. on mouseUp
  247.   global gc
  248.   put 6 into gc
  249.   global it
  250.   put 6 into it
  251.   global gb
  252.   if gb = 6 then
  253.     hide button "6th"
  254.   else if gb <> 6 then
  255.     visual venetian blinds
  256.     go to card id 49533
  257.   end if
  258.  
  259. end mouseUp
  260.  
  261.  
  262.  
  263.  
  264. -- part 13 (button)
  265. -- low flags: 00
  266. -- high flags: 2000
  267. -- rect: left=89 top=244 right=302 bottom=161
  268. -- title width / last selected line: 0
  269. -- icon id / first selected line: 20186 / 20186
  270. -- text alignment: 1
  271. -- font id: 0
  272. -- text size: 12
  273. -- style flags: 0
  274. -- line height: 16
  275. -- part name: 7th
  276. ----- HyperTalk script -----
  277. on mouseUp
  278.   global it
  279.   put 7 into it
  280.   global gb
  281.   if gb = 7 then
  282.     hide button "7th"
  283.   else if gb <> 7 then
  284.     visual venetian blinds
  285.     go to card id 49533
  286.   end if
  287.  
  288. end mouseUp
  289.  
  290.  
  291.  
  292.  
  293. -- part 14 (button)
  294. -- low flags: 00
  295. -- high flags: 2000
  296. -- rect: left=380 top=266 right=313 bottom=427
  297. -- title width / last selected line: 0
  298. -- icon id / first selected line: 32488 / 32488
  299. -- text alignment: 1
  300. -- font id: 0
  301. -- text size: 12
  302. -- style flags: 0
  303. -- line height: 16
  304. -- part name: New Button
  305. ----- HyperTalk script -----
  306. on mouseUp
  307.   global gb
  308.   put 0 into gb
  309.   show button "1st"
  310.   show button "2nd"
  311.   show button "3rd"
  312.   show button "4th"
  313.   show button "5th"
  314.   show button "6th"
  315.   show button "7th"
  316. end mouseUp
  317.  
  318.